home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / glass / glass.lha / GLASS / dtm / dtm_atoms.c < prev    next >
Text File  |  1991-06-18  |  1KB  |  29 lines
  1. #define one(t) (1)
  2. #define zero(t) (0)
  3. #define init(t) ((t<3)?0:1)
  4.  
  5. #define buf(x) (x)
  6. #define not(x) (!(x))
  7.  
  8. #define and2(a0,a1) ((a0) && (a1))
  9. #define and3(a0,a1,a2) ((a0) && (a1) && (a2))
  10. #define and4(a0,a1,a2,a3) ((a0) && (a1) && (a2) && (a3))
  11. #define and5(a0,a1,a2,a3,a4) ((a0) && (a1) && (a2) && (a3) && (a4))
  12.  
  13. #define or2(a0,a1) ((a0) || (a1))
  14. #define or3(a0,a1,a2) ((a0) || (a1) || (a2))
  15. #define or4(a0,a1,a2,a3) ((a0) || (a1) || (a2) || (a3))
  16. #define or5(a0,a1,a2,a3,a4) ((a0) || (a1) || (a2) || (a3) || (a4))
  17.  
  18. #define nand2(a0,a1) (!((a0) && (a1)))
  19. #define nand3(a0,a1,a2) (!((a0) && (a1) && (a2)))
  20. #define nand4(a0,a1,a2,a3) (!((a0) && (a1) && (a2) && (a3)))
  21. #define nand5(a0,a1,a2,a3,a4) (!((a0) && (a1) && (a2) && (a3) && (a4)))
  22.  
  23. #define nor2(a0,a1) (!((a0) || (a1)))
  24. #define nor3(a0,a1,a2) (!((a0) || (a1) || (a2)))
  25. #define nor4(a0,a1,a2,a3) (!((a0) || (a1) || (a2) || (a3)))
  26. #define nor5(a0,a1,a2,a3,a4) (!((a0) || (a1) || (a2) || (a3) || (a4)))
  27.  
  28. #define xor2(a0,a1) ((a0 && (!a1)) || ((!a0) && a1))
  29.